;; (PV_RectComb buffer numTeeth phase width)

;; 

(define b (buffer-alloc 2048 1 #t))

(IFFT.ar (PV_RectComb.kr (FFT.kr (buffer-id b) (WhiteNoise.ar 0.3))
			 8
			 (MouseX.kr 0 0.5)
			 (MouseY.kr 0 0.5)))

(IFFT.ar (PV_RectComb.kr (FFT.kr (buffer-id b) (WhiteNoise.ar 0.3))
			 8
			 (LFTri.kr 0.097 0 0.4 0.5)
			 (LFTri.kr 0.24 0 -0.5 0.5)))

(buffer-free b)
